home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: MegaDisc
/
MegaDisc 30 (1992-10)(MegaDisc Digital Publishing)(AU)(Disk 1 of 2)[WB].zip
/
MegaDisc 30 (1992-10)(MegaDisc Digital Publishing)(AU)(Disk 1 of 2)[WB].adf
/
Programs
/
WeekDay
/
Version.h
< prev
next >
Wrap
Text File
|
1992-10-05
|
5KB
|
67 lines
/****************************************************************************
*$RevHead_Start *
* *
* Project Details *
* --------------- *
* Project Name: WeekDay *
* Project Version: 0.8 *
* Copyright: © David M. Balean 1992 *
* Date: Monday 17th August 1992 *
* Start DateStamp: 13-Aug-1992 11.51.25.30 *
* Project Manager: DMB, 44 Wyong Rd, Killarney Vale, NSW 2261 *
* *
*****************************************************************************
* *
* This File: Version.h *
*$Author: © David M. Balean 1992 *
*$File Version: 0.8 *
*$DateStamp: 17-Aug-1992 20.34.53.27 *
* *
*****************************************************************************
* Project Summary: *
* Given a date, inform the user what day of the week it was. *
* Julian calendar in operation 0 to 4/10/1582. *
* Skipped 11 days. *
* Gregorian calendar in operation from 15/18/1582. *
*****************************************************************************
* Project History *
* --------------- *
* Date Time Version Author *
* *
* CHANGED/CREATED for Date Version: 0.5 *
* *
* FILE: date.c *
* 13-Aug-1992 11.47.41.22 0.5 David M. Balean *
* Calculate the day of the week from a given date. *
* ------------------------------------ *
* *
* CHANGED/CREATED for Date Version: 0.6 *
* *
* FILE: date.c *
* 13-Aug-1992 13.11.26.47 0.6 David M. Balean *
* Added check for legal date - allows from 5 AD onwards. *
* ------------------------------------ *
* *
* CHANGED/CREATED for Date Version: 0.7 *
* *
* FILE: date.c *
* 16-Aug-1992 21.40.55.39 0.7 David M. Balean *
* Now uses an array of sums of days in the months of the year. *
* Add a day if leap year and after February. *
* Could use Gauss's method: (c=centuries, y=tens and units m=month d=day) *
* A = int[2.6m - .2] + d + y + int[y/4] + int[c/4] - 2c *
* but then if month is Jan or Feb it is part of previous year.(then % 7 ) *
* ------------------------------------ *
* *
* CHANGED/CREATED for WeekDay Version: 0.8 *
* *
* Re-named it "WeekDay" to avoid confusion with "C:Date" *
* ------------------------------------ *
* *
*$RevHead_End *
****************************************************************************/
#define PROJECT_NAME 'W','e','e','k','D','a','y'
#define PROJECT_VERSION '0','.','8'
#define PROJECT_COPYRIGHT '©',' ','D','a','v','i','d',' ','M','.',' ','B','a','l','e','a','n',' ','1','9','9','2'